﻿Imports DTO
Imports System.Collections
Public Class CDataDiaChi
    Inherits CDataProvider

    Private strSQL As String

    Public Function LayTenTinh(ByVal maTinh As Integer) As String
        strSQL = "select `tenTinh` from `qlbh`.`tinh` where maTinh = '" & maTinh & "';"
        Return ExecuteScalar(strSQL)
    End Function

    Public Function LayTenHuyen(ByVal maHuyen As Integer, ByVal maTinh As Integer) As String
        strSQL = "select `tenHuyen` from `qlbh`.`huyen` where maHuyen = '" & maHuyen & "' and maTinh = '" & maTinh & "';"
        Return ExecuteScalar(strSQL)
    End Function
End Class
